; Lisp (getf ...)

(structure +lh_list 0
	(ptr head tail tailpred))

(structure +ln_node 0
	(ptr succ pred))

(structure +ln_fnode 0
	(ptr next))
